home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Magazin: Amiga-CD 1997 May & June
/
Amiga-CD 1997 #5-6.iso
/
amiga-internet-seiten
/
magazin
/
a04-96
/
chip2fast.lha
/
Chip2Fast
/
Chip2Fast.c
< prev
next >
Wrap
C/C++ Source or Header
|
1996-03-12
|
4KB
|
158 lines
/*
Chip2Fast - zum Einbinden von Chip als Fast-Mem
entstanden aus
Arguments -- eine CLI-Hülle für Programme ab Workbench 2.04
*/
/*
* allgemeine Include-Dateien
*/
#include <string.h>
#include <stdlib.h>
/*
* spezielle Amiga-Include-Dateien
*/
#include <dos/dos.h>
#include <dos/rdargs.h>
#include <exec/memory.h>
#include <exec/types.h>
#include <exec/execbase.h>
#include <clib/exec_protos.h>
#include <clib/dos_protos.h>
/*
* Defines, die bei einer Kopie zu ändern sind
*/
#define PROGNAME "Chip2Fast" /* Default-Name des Programms */
#define VERSION "1.0" /* Versions-Nummer 1.0 am Anfang! */
#define AUTHOR "David Göhler" /* Name des Autors */
#define DATE "28.02.96" /* Datum der letzten Änderung */
#define ENVVAR PROGNAME /* Name einer ENV-Variable */
/*
* dauerhafte define's, die kaum einer Änderung bedürfen
*/
#define NAMELEN 255 /* Länge des Programmnamens */
#define LINELEN 10000 /* Zeilenlänge im Makefile */
#define BUFLEN 200 /* Pufferlänge für Datei-Pattern */
/*
* Default-Optionen
*/
#define DEFAULT_KBYTE 512
#define DEFAULT_PRIORITY 10
#define DEFAULT_TESTLEVEL 2
#define DEFAULT_NAME "Chip2Fast Memory"
/*
* falls ein GCC zum Einsatz kommt, DICE-Spezialitäten abwürgen
*/
#ifdef __GNUC__
#define __stkargs /* kennt der GCC nicht */
#endif
const char VersionID []="$VER: " PROGNAME " " VERSION " - © " AUTHOR " " DATE;
const char TemplateString []="KBYTE/N,PRI/K/N,NAME/K";
// enum TemplateEnum { KBYTE, PRI, NAME};
typedef struct {
LONG *KByte; /* wieviel KByte nehmen, default s.o. */
LONG *priority; /* mit welcher Priority */
char *memname; /* wie der Speicher heißen soll */
} Template; /* Für die Kommandozeile */
ULONG kbyte;
LONG priority;
char *memname;
/*
* globale Variablen, die die Einstellungen per Kommandozeile darstellen
*/
char EnvString [BUFLEN] = ""; /* für eine eventuelle Env-Variable */
char progname [NAMELEN]= PROGNAME; /* Für Ausgaben bei Fehlermeldungen */
Template CommandLineVars = { /* Template-Struktur für ReadArgs */
0L, 0L, 0L
};
/*
* externe Referenzen
*/
extern struct ExecBase *SysBase; /* Für den Versionstest */
/*
* main-Kopf, für GCC-Nutzer mit Extrawurst
*/
main()
{
struct RDArgs *rda; /* nicht notwendigerweise global */
long rc = RETURN_OK; /* Return-Code von main */
/* dies Programm läuft nur ab Version 2.04 */
if (SysBase->LibNode.lib_Version < 37)
{ Write(Output(),"Wrong kickstart version, must 37.175 or higher\n",47);
return RETURN_FAIL;
}
/* wie heiße ich denn ? */
if (!GetProgramName(progname,NAMELEN-1)) /* bei Fehlversuch */
{ strncpy(progname,PROGNAME,NAMELEN-1); } /* Default kopieren */
/* nun die Kommandozeilenauswertung erledigen - per Systemaufruf */
if (rda = ReadArgs ((UBYTE *)TemplateString,(LONG *) &CommandLineVars,NULL))
{
APTR chipmem;
if (CommandLineVars.priority == 0)
{ priority = DEFAULT_PRIORITY; }
else
{ priority = *(CommandLineVars.priority); }
if (CommandLineVars.memname == 0)
{ if (memname = AllocMem(strlen(DEFAULT_NAME)+1,MEMF_PUBLIC))
{ strncpy(memname, DEFAULT_NAME, NAMELEN-1); }
else
{ memname = 0L; }
}
else
{ if (memname = AllocMem(strlen(CommandLineVars.memname)+1,MEMF_PUBLIC))
{ strncpy(memname, CommandLineVars.memname, NAMELEN-1); }
else
{ memname = 0L; }
}
if (CommandLineVars.KByte == 0)
{ kbyte = DEFAULT_KBYTE; }
else
{ kbyte = *(CommandLineVars.KByte); }
if (chipmem = AllocMem(kbyte*1024,MEMF_CHIP))
{ AddMemList(kbyte*1024,MEMF_PUBLIC|MEMF_FAST,priority,chipmem,memname); }
else
{ Printf("Konnte %ld KByte nicht allozieren\n",kbyte); }
/* alloziertes wieder freigeben */
FreeArgs(rda);
}
else
{ rc = RETURN_ERROR; }
/* bei einem Fehler, den Fehler ausgeben */
if (rc != RETURN_OK) PrintFault(IoErr(),progname);
return rc;
}